home *** CD-ROM | disk | FTP | other *** search
/ Trading on the Edge / Trading On The Edge - CD-ROM Toolkit (Wayzata Technology)(2031)(1994).bin / pc / mac_file / vendor_d / neuralwa / nw2v50 / fzartcom.igb < prev    next >
Text File  |  1993-08-23  |  1KB  |  65 lines
  1. inst4.1     !Jan, 1993
  2. !****************************************************************
  3. !*                                *
  4. !*    Fuzzy ARTMAP committed nodes                *
  5. !*                                *
  6. !****************************************************************
  7. !
  8.  
  9. @LLsl                !Load super-layer
  10. =n0    Lpes            !Number of layers
  11. =LayN    0
  12.  
  13. ! First look for category layer
  14.  
  15. :FzA1
  16. +LayN    1            !next layer
  17. ?LayN    n0
  18. >bgt    FzAEnd            !past output layer
  19. @LLly                !load the layer
  20. ?Llrn    0            !is this a preprocessing layer?
  21. >bne    FzA2            !we are past the preprocessing layers
  22. >br    FzA1            !next layer
  23.  
  24. :FzA2
  25.  
  26. ! Add probe
  27. =PNam    "Category"        !probe name
  28. =NPEl    LayN            !point to layer
  29. @PbAS                !Add Probe
  30. @PbDC                !Delete all components
  31. @PALy                !Add Near Layer to Probe
  32.  
  33. ! Now build the instrument
  34. @ILdD                !load default instrument
  35. =ITit    "Committed Nodes"    !Instrument title
  36. =IGTy    "Bar"            !Graph Type
  37. =IGVr    "Sum"            !Variable
  38. =ITTy    "RMS"            !RMS Transformation Type
  39. =ITMd    0            !No transformation
  40. =IEpc    0            !No epoch
  41.  
  42. =n0    Lpes            !#PEs in F1 layer
  43. =n1    1            !1 row if possible
  44.  
  45. ! standard bar graph parameters
  46. #Incl    "barparms.iif"
  47.  
  48. =Ivmn    0.0
  49. =Ivmx    1.0
  50. =ILnA    1            !Active in Learn
  51. =IRcA    1            !Active in recall
  52. =ILDv    1            !Every iteration
  53. =ILRm    0
  54. =IRDv    0
  55. =IRRm    0
  56. =IPrb    PNam            !Point to probe
  57. =ICAc    0            !Convergence criterion inactive
  58. =ICTh    0.0            !Convergence Threshold
  59. !Let NeuralWorks figure out where to put instrument
  60. =x    0
  61. =y    0
  62. @IAdd                !Now create instrument
  63.  
  64. :FzAEnd
  65.